5 PRINT CHR$(14)
10 POKE53280,14:POKE53281,14:PRINTCHR$(31)CHR$(147):H=53270:B$=CHR$(19)
20 A$(.)=" *********** [212]IPS [193]HOY! ******************* "
30 A$(1)="[194][193][211][201][195] [198]LASHING [211]CROLL [210]OUTINE. [194]Y [206]ICK "
40 A$(2)="[202]ANKOVIC ([203][205][212]). [210]EFER TO [193]HOY! MAGAZINE"
50 A$(3)=" [207]CTOBER 1988 FOR INSTRUCTIONS.        "
60 FORA=.TO3:FORB=1TO40:FORC=7TO.STEP-1
70 POKE53265,PEEK(53265)OR16:POKEH,C:NEXT
80 POKE53265,PEEK(53265)AND239:PRINTB$;MID$(A$(A),B,40-B);MID$(A$(A+1),1,B)
90 GETE$:IFE$<>""THENPOKE53265PEEK(53265)OR16:POKEH,8:PRINTCHR$(147):END
100 NEXT:NEXT:POKE53265,PEEK(53265)OR16:RUN